home *** CD-ROM | disk | FTP | other *** search
/ Shareware Grab Bag / Shareware Grab Bag.iso / 008 / flashdnc.bas (.txt) < prev    next >
Encoding:
GW-BASIC  |  1984-04-24  |  1.4 KB  |  38 lines
  1. 10  COLOR 9,0,1
  2. 20  CLS:KEY OFF:SCREEN 0:WIDTH 80
  3. 30  LOCATE 8,10
  4. 40  PRINT "FLASHDANCE...WHAT A FEELING"
  5. 50  LOCATE 10,12:COLOR 11:PRINT "(C) "
  6. 60  LOCATE 10,16:COLOR 13:PRINT "Judith "
  7. 70  LOCATE 10,23:COLOR 14:PRINT "Penner":COLOR 10:LOCATE 12,30,0:PRINT CHR$(14)
  8. 80  PLAY "MB T105 O4 L2E.L8DCL2D.L8DEL2F.L8EEEDL2C"
  9. 90  LOCATE 12:PRINT"First when there's nothing but a slow glowing dream,
  10. 100  PLAY "MB T105 O4 L8DCL2A.L8GFL2G.L8FGFEL2DL4CL2D.
  11. 110  PRINT"That your fear seems to hide deep inside your mind.
  12. 120  PLAY "MB T105 O4 L8CDL2E.L8DCL2D.L8DEL2F.L8EEEDL4CP4
  13. 130  PRINT"All alone I have cried silent tears full of pride,
  14. 140  PLAY "MB T105 O4 L8DCL2A.L8GFL2G.L8FGFEL4D
  15. 150  PRINT"In a world made of steel, made of stone.....
  16. 160  PLAY "MB T115 O4 >l8dcl4cl8ddl2d.P4C4L8CCP4L8DDL4DP4<
  17. 170  '(music part #1)
  18. 180  PLAY "MB T115 L8CDL2E.L8DCL4DL2<G>L8DDL2F.L8EDEDL2C
  19. 190  PRINT"Well I hear the music, close my eyes feel the rhythm.
  20. 200  PLAY"MB T115 L8DCA2.>C<AG2.FEFED4>DCC4P4
  21. 210  PRINT"Wrap around take a hold of my heart...
  22. 220  PLAY "MB T115 L4CDP8
  23. 240  FOR I=1 TO 2
  24. 250  PLAY "MB T115 O4 L8GBL4>CCC8<L8BB4BAA4G4
  25. 260  NEXT I
  26. 265  PRINT"What a feeling...Being's believing.
  27. 270  PLAY "MB L8GB>CC4D4C<B4>CC4.D<G4G4.
  28. 280  PRINT"I can have it all, now I'm dancin for my life.
  29. 290  PLAY "MB P4L8GB>CC<A4>C<BB4BAAA>D4C4CC<A4>C<BB4BAA4
  30. 300  PRINT"Take your passion, and make it happen.
  31. 310  PLAY "MB L8 GB>CC4.DC<B4>CC4.D<GG4G4>C4<B4BBAAA4G4GB
  32. 320  PRINT"Pictures come alive you can dance right through your life.
  33. 340  FOR Z=1 TO 3
  34. 350  PLAY "MB T100 L8>C4C4C<BB4BAA4G4GB"
  35. 355  PRINT"What a feeling.....
  36. 360  NEXT Z
  37. 370  PLAY"O4 C1"
  38.